'   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 '     T h e   P T 1 0 0 / 5 0 0 / 1 0 0 0   s e n s o r   m u s t   b e   c o n n e c t e d   w i t h   3   o r   4   w i r e s 
 
 '     a s   e x p l a i n e d   i n   t h e   A D C 2 4   d o c u m e n t a t i o n 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 '     A n d   t h e   H A L   m u s t   b e   p r o g r a m m e d   a s   f o l l o w s : 
 
 '     P i n     7   =   A D C 2 4   /   P i n s   >   4   /   S a m p l e s / s e c   =   1 0 0 0   /   F i l t e r   =   F a s t 
 
 '     P i n   2 1   =   M a x   =   3 . 3   /   M i n   =   - 3 . 3   /   R e s p o n s e   S p e e d   ( g r a y e d )   =   3 0   /   D i f f .     /   G a i n   =   1   /   N o t   b i a s e d 
 
 '     P i n   2 3   =   M a x   =   3 . 3   /   M i n   =   0         /   R e s p o n s e   S p e e d   ( g r a y e d )   =   3 0   /   S i n g l e   /   G a i n   =   1   /   N o t   b i a s e d 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 V a r i a b l e   N u m e r i c   S l o t _ P T 1 0 0 _ V o l t 1       =   2 1 
 
 V a r i a b l e   N u m e r i c   S l o t _ P T 1 0 0 _ V R e s I       =   2 3 
 
 V a r i a b l e   N u m e r i c   S l o t _ P T 1 0 0 _ T e m p         =   2 5 
 
 
 
 L o a d   T h e r e m i n o _ H A L . e x e 
 
 L o a d   T h e r e m i n o _ S l o t V i e w e r . e x e 
 
 L o a d   T h e r e m i n o _ S i g n a l S c o p e . e x e 
 
 L o a d   H i d e 
 
 
 
 O p t i o n   S p e e d   9 
 
 L o o p 
 
 S t o p 
 
 
 
 L a b e l   E v e n t S t o p 
 
 	 L o a d   C l o s e A p p s   T h e r e m i n o _ H A L . e x e 
 
 	 L o a d   C l o s e A p p s   T h e r e m i n o _ S l o t V i e w e r . e x e 
 
 	 L o a d   C l o s e A p p s   T h e r e m i n o _ S i g n a l S c o p e . e x e 
 
 E n d 
 
 
 
 L a b e l   L o o p 
 
 	 R e a d _ P T 1 0 0 
 
 	 W a i t   S e c o n d s   0 . 0 1 
 
 G o t o   L o o p 
 
 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =   R E A D   P T 1 0 0 
 
 V a r i a b l e   N u m e r i c   c 0           =   - 2 4 5 . 1 9 
 
 V a r i a b l e   N u m e r i c   c 1           =         2 . 5 2 9 3 
 
 V a r i a b l e   N u m e r i c   c 2           =       - 0 . 0 6 6 0 4 6 
 
 V a r i a b l e   N u m e r i c   c 3           =         0 . 0 0 4 0 4 2 2 
 
 V a r i a b l e   N u m e r i c   c 4           =       - 0 . 0 0 0 0 0 2 0 6 9 7 
 
 V a r i a b l e   N u m e r i c   c 5           =       - 0 . 0 2 5 4 2 2 
 
 V a r i a b l e   N u m e r i c   c 6           =         0 . 0 0 1 6 8 8 3 
 
 V a r i a b l e   N u m e r i c   c 7           =       - 0 . 0 0 0 0 0 1 3 6 0 1 
 
 V a r i a b l e   N u m e r i c   R P T         =     1 0 0                                 '   S e n s o r   r e s i s t a n c e   v a l u e   ( 1 0 0   5 0 0   o r   1 0 0 0 ) 
 
 V a r i a b l e   N u m e r i c   R e s I       =     9 9 0                                 '   R e s i s t o r   t o   m e a s u r e   t h e   c u r r e n t   ( 1 K   t o   1 0 K ) 
 
 
 
 V a r i a b l e   N u m e r i c   R 1                                                       '   M e a s u r e d   s e n s o r   r e s i s t a n c e 
 
 V a r i a b l e   N u m e r i c   V o l t 1 
 
 V a r i a b l e   N u m e r i c   V R e s I 
 
 V a r i a b l e   N u m e r i c   T e m p 
 
 
 
 L a b e l   R e a d _ P T 1 0 0 
 
 	 V o l t 1   =   S l o t ( S l o t _ P T 1 0 0 _ V o l t 1 ) 
 
 	 V R e s I   =   S l o t ( S l o t _ P T 1 0 0 _ V R e s I ) 
 
 	 ' 
 
 	 R 1   =   R e s I   *   V o l t 1   /   V R e s I 
 
 	 ' 
 
 	 R 1   =   R 1   *   1 0 0   /   R P T     '   < - -   N o r m a l i z e   t o   1 0 0   f o r   P T 5 0 0   a n d   P T   1 0 0 0 
 
 	 T e m p   =     c 0   +   R 1   *   ( c 1   +   R 1   *   ( c 2   +   R 1   *   ( c 3   +   c 4   *   R 1 ) ) )   /   ( 1   +   R 1   *   ( c 5   +   R 1   *   ( c 6   +   c 7   *   R 1 ) ) ) 
 
 	 ' 
 
 	 P r i n t   " T e m p e r a t u r e   =   "   +   F o r m a t ( T e m p ,   " 0 . 0 " )   +   "  C "   +   C R L F 
 
 	 S l o t ( S l o t _ P T 1 0 0 _ T e m p )   =   T e m p 
 
 R e t u r n 
 
 
 
 
 
 
 
 
 
 
 
 ' B O O K M A R K S   
 
 
 
 ' E D I T E D L I N E S   - 1   3   3   4   5   4   6   4   0   4   8   4   - 1   3   7   4   2 6   5   - 1   9   - 1   7   2 3   1 0   2 4   1 0   2 5   1 0   
 
 
 
 